home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 26
/
Cream of the Crop 26.iso
/
os2
/
rexxgdb2.zip
/
Thread2.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1997-08-10
|
397b
|
12 lines
/* rexx */
sql2 = 'select substr(text, 1, 20) from sysibm.sysviews where length(text) > 1000'
say '2 Started' time('L')
call time 'R'
returned = g2selectone('sql2')
say '2 SelectOne returns ' returned
say '2 length ' length(returned)
say '2 G2SQLCODE ' g2sqlcode
say '2 G2LONGRESULT ' g2longresult' length='length(g2longresult)
say '2 Ended' time('L')
return